1 REM *********************
10 KEY
100 SCREEN COPY
1000 CLEAR KEY
110 NEXT
120 FOR
130 SCREEN COPY
140 SCREEN COPY
150 NEXT
155 REM **************   appear << 3 >>  **************
160 GOSUB
180 FOR
190 SCREEN COPY
2 REM *** by R.Hamminga ***
20 GET PALETTE
200 SCREEN COPY
210 NEXT
215 REM **************   appear << 4 >>  **************
220 GOSUB
230 VARNAME
250 FOR
260 FOR
270 SCREEN COPY
280 SCREEN COPY
290 NEXT
295 REM **************   appear << 5 >>  **************
3 REM *********************
30 FOR
300 GOSUB
310 VARNAME
320 FOR
330 SCREEN COPY
340 SCREEN COPY
350 NEXT
360 GOSUB
4 REM 
40 SCREEN COPY
45 SCREEN COPY
5 VARNAME
50 NEXT
55 REM **************   appear << 2 >>  **************
6 RESERVE
60 GOSUB
80 FOR
9 REM **************   appear << 1 >>  **************
90 SCREEN COPY